/**
 * Trabajo de Ingeniería de Software 2
 * Año 2008
 * Sistema de Reserva de Recursos.
 * Desarrolladores: - Marcelo Ferreira.
 *                  - Christian Gómez.
 *                  - Marcelo Rodas.
 */

package controller;

import java.util.List;
import java.util.Map;
import javax.annotation.Resource;
import javax.faces.component.UIComponent;
import javax.faces.context.FacesContext;
import javax.faces.model.SelectItem;
import javax.persistence.EntityManager;
import javax.persistence.EntityManagerFactory;
import javax.persistence.PersistenceUnit;
import javax.persistence.Query;
import javax.faces.application.FacesMessage;
import java.lang.reflect.InvocationTargetException;
import java.lang.reflect.Method;
import javax.faces.FacesException;
import java.util.HashMap;
import javax.faces.validator.ValidatorException;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collection;
import java.util.Vector;
import javax.transaction.UserTransaction;
import modelo.Ubicacion;
import modelo.Usoretiro;

/**
 * Controlador de las Funcionalidades de Ubicacion.
 * Utilizado para manejar la capa de controlador (MVC)
 * del sistema.
 * @author cgomez
 * @version 1.0
 */
public class UbicacionController {
    // POJO de Ubicacion Representada.
    private Ubicacion ubicacion = null;
    // Lista de Ubicacion
    private List<Ubicacion> ubicacions = null;
    // Transacción del usuario.
    @Resource
    private UserTransaction utx = null;
    // Administrador de la Persistencia de los Objetos Ubicacion.
    // Relaciona al Controlador con el Modelo (MVC) 
    @PersistenceUnit(unitName = "sistemaReservaPU")
    private EntityManagerFactory emf = null;
    
    /**
     * Getter del Administrador de Entidades.
     * @return EntityManager
     */
    public EntityManager getEntityManager() {
        return emf.createEntityManager();
    }
    
    // ---------- Variables para paginar en el jsp -------------
    // variable auxiliar que indica el tamaño de conjunto
    public int batchSize = 100;
    // variable auxiliar para indicar el 1er elemento
    private int firstItem = 0;
    // variable auxiliar utilizado como contador de elementos
    private int itemCount = -1;

    /**
     * Setter de la coleccion de SolicitudReserva de los Ubicacion's
     * @param usoretiroCollection el usoretiroCollection de Ubicacion
     */ 
    public void setUsoretiroCollectionOfUbicacion(Usoretiro[] usoretiroCollection) {
        List<Usoretiro> usoretiroCollectionList = Arrays.asList(usoretiroCollection);
        ubicacion.setUsoretiroCollection(usoretiroCollectionList);
    }
    
    /**
     * Getter del usoretiroCollection de los Objetos Ubicacion's
     * @return usoretiroCollection el usoretiroCollection de Ubicacion
     */
    public Usoretiro[] getUsoretiroCollectionOfUbicacion() {
        Collection<Usoretiro> usoretiroCollection = ubicacion.getUsoretiroCollection();
        if (usoretiroCollection == null) {
            return new Usoretiro[0];
        }
        return usoretiroCollection.toArray(new Usoretiro[0]);
    }
    
    /**
     * Metodo para obtener una lista de los Ubicacion's disponibles de varias selecciones
     * @return lista de Ubicacion
     */
    public SelectItem[] getUbicacionsAvailableSelectMany() {
        return getUbicacionsAvailable(false);
    }
    
    /**
     * Metodo publico para obtener una lista de los Ubicacion's disponibles de una sola seleccion
     * @return lista de Ubicacion
     */
    public SelectItem[] getUbicacionsAvailableSelectOne() {
        return getUbicacionsAvailable(true);
    }
    
    /**
     * Metodo privado para obtener una lista de los Ubicacion disponibles de una sola seleccion
     * @return lista de Ubicacion
     */
    private SelectItem[] getUbicacionsAvailable(boolean one) {
        List<Ubicacion> allUbicacions = getUbicacions(true);
        int size = one ? allUbicacions.size() + 1 : allUbicacions.size();
        SelectItem[] items = new SelectItem[size];
        int i = 0;
        if (one) {
            items[0] = new SelectItem("", "---");
            i++;
        }
        for (Ubicacion x : allUbicacions) {
            items[i++] = new SelectItem(x, x.toString());
        }
        return items;
    }
    
    /**
     * Metodo para obtener el objeto Ubicacion del Request
     * @return el objeto Ubicacion obtenido
     */
    public Ubicacion getUbicacion() {
        if (ubicacion == null) {
            ubicacion = getUbicacionFromRequest();
        }
        if (ubicacion == null) {
            ubicacion = new Ubicacion();
        }
        return ubicacion;
    }
    
    /**
     * Metodo para resetear los valores de inicio y llamar al Tag de Lista de Ubicacion
     * @return el tag de la Lista de Ubicacion
     */
    public String listSetup() {
        reset(true);
        return "ubicacion_listar";
    }

    /**
     * Funcion que prepara el listado de Ubicaciones
     * @return String
     */ 
    public String listarSetup() {
        reset(true);
        return "ubicacion_listar";
    }
    
    /**
     * Metodo para inicializar los valores del Objeto Ubicacion para un nuevo objeto
     * @return el Tag del JSP para crear una nueva entrada de Ubicacion
     */      
    public String createSetup() {
        reset(false);
        ubicacion = new Ubicacion(this.getItemMax());
        return "ubicacion_create";
    }
    
    /**
     * Metodo publico para crear una nueva entrada de Ubicacion
     * @return el Tag del siguiente JSP a desplegar
     */
    public String create() {
        if (ubicacion.getUsoretiroCollection() == null) {
            ubicacion.setUsoretiroCollection(new ArrayList<Usoretiro>());
        }
        EntityManager em = getEntityManager();
        try {
            utx.begin();
            List<Usoretiro> attachedUsoretiroCollection = new ArrayList<Usoretiro>();
            for (Usoretiro usoretiroCollectionUsoretiroToAttach : ubicacion.getUsoretiroCollection()) {
                usoretiroCollectionUsoretiroToAttach = em.getReference(usoretiroCollectionUsoretiroToAttach.getClass(), usoretiroCollectionUsoretiroToAttach.getIdUsoRetiro());
                attachedUsoretiroCollection.add(usoretiroCollectionUsoretiroToAttach);
            }
            ubicacion.setUsoretiroCollection(attachedUsoretiroCollection);
            em.persist(ubicacion);
            for (Usoretiro usoretiroCollectionUsoretiro : ubicacion.getUsoretiroCollection()) {
                Ubicacion oldIdUbicacionOfUsoretiroCollectionUsoretiro = usoretiroCollectionUsoretiro.getIdUbicacion();
                usoretiroCollectionUsoretiro.setIdUbicacion(ubicacion);
                usoretiroCollectionUsoretiro = em.merge(usoretiroCollectionUsoretiro);
                if (oldIdUbicacionOfUsoretiroCollectionUsoretiro != null) {
                    oldIdUbicacionOfUsoretiroCollectionUsoretiro.getUsoretiroCollection().remove(usoretiroCollectionUsoretiro);
                    oldIdUbicacionOfUsoretiroCollectionUsoretiro = em.merge(oldIdUbicacionOfUsoretiroCollectionUsoretiro);
                }
            }
            utx.commit();
            addSuccessMessage("El nuevo registro fue creado con éxito");
        } catch (Exception ex) {
            try {
                if (findUbicacion(ubicacion.getIdUbicacion()) != null) {
                    addErrorMessage("El idUbicacion " + ubicacion + " ya existe.");
                } else {
                    ensureAddErrorMessage(ex, "A persistence error occurred.");
                }
                utx.rollback();
            } catch (Exception e) {
                ensureAddErrorMessage(e, "An error occurred attempting to roll back the transaction.");
            }
            return null;
        } finally {
            em.close();
        }
        return listSetup();
    }
    
    /**
     * Inicializa el los Detalles de la Ubicacion
     * @return scalarSetup("ubicacion_detalle")
     */
    public String detalleSetup() {
        return scalarSetup("ubicacion_detalle");
    }
    
     /**
     * Funcion de Navegacion a la Pagina Detail.jsp de los Objetos Ubicacion
     * @return String
     */        
    public String detailSetup() {
        return scalarSetup("ubicacion_detail");
    }
    /**
     * Funcion de Navegacion a la Pagina Edicion de los Ubicacion's
     * @return String
     */
    public String editSetup() {
        return scalarSetup("ubicacion_edit");
    }
    /*
     * Función de Navegación General, controla si existe la ruta de
     * navegación.
     */
    private String scalarSetup(String destination) {
        reset(false);
        ubicacion = getUbicacionFromRequest();
        if (ubicacion == null) {
            String requestUbicacionString = getRequestParameter("jsfcrud.currentUbicacion");
            addErrorMessage("The ubicacion with id " + requestUbicacionString + " no longer exists.");
            String relatedControllerOutcome = relatedControllerOutcome();
            if (relatedControllerOutcome != null) {
                return relatedControllerOutcome;
            }
            return listSetup();
        }
        return destination;
    }
    
    /**
     * Función publica que procesa los cambios realizados sobre los objetos
     * Ubicacion's Representados.
     * @return String
     */
    public String edit() {
        UbicacionConverter converter = new UbicacionConverter();
        String ubicacionString = converter.getAsString(FacesContext.getCurrentInstance(), null, ubicacion);
        String currentUbicacionString = getRequestParameter("jsfcrud.currentUbicacion");
        if (ubicacionString == null || ubicacionString.length() == 0 || !ubicacionString.equals(currentUbicacionString)) {
            String outcome = editSetup();
            if ("ubicacion_edit".equals(outcome)) {
                addErrorMessage("Could not edit ubicacion. Try again.");
            }
            return outcome;
        }
        EntityManager em = getEntityManager();
        try {
            utx.begin();
            Ubicacion persistentUbicacion = em.find(Ubicacion.class, ubicacion.getIdUbicacion());
            Collection<Usoretiro> usoretiroCollectionOld = persistentUbicacion.getUsoretiroCollection();
            Collection<Usoretiro> usoretiroCollectionNew = ubicacion.getUsoretiroCollection();
            List<Usoretiro> attachedUsoretiroCollectionNew = new ArrayList<Usoretiro>();
            for (Usoretiro usoretiroCollectionNewUsoretiroToAttach : usoretiroCollectionNew) {
                usoretiroCollectionNewUsoretiroToAttach = em.getReference(usoretiroCollectionNewUsoretiroToAttach.getClass(), usoretiroCollectionNewUsoretiroToAttach.getIdUsoRetiro());
                attachedUsoretiroCollectionNew.add(usoretiroCollectionNewUsoretiroToAttach);
            }
            usoretiroCollectionNew = attachedUsoretiroCollectionNew;
            ubicacion.setUsoretiroCollection(usoretiroCollectionNew);
            ubicacion = em.merge(ubicacion);
            for (Usoretiro usoretiroCollectionOldUsoretiro : usoretiroCollectionOld) {
                if (!usoretiroCollectionNew.contains(usoretiroCollectionOldUsoretiro)) {
                    usoretiroCollectionOldUsoretiro.setIdUbicacion(null);
                    usoretiroCollectionOldUsoretiro = em.merge(usoretiroCollectionOldUsoretiro);
                }
            }
            for (Usoretiro usoretiroCollectionNewUsoretiro : usoretiroCollectionNew) {
                if (!usoretiroCollectionOld.contains(usoretiroCollectionNewUsoretiro)) {
                    Ubicacion oldIdUbicacionOfUsoretiroCollectionNewUsoretiro = usoretiroCollectionNewUsoretiro.getIdUbicacion();
                    usoretiroCollectionNewUsoretiro.setIdUbicacion(ubicacion);
                    usoretiroCollectionNewUsoretiro = em.merge(usoretiroCollectionNewUsoretiro);
                    if (oldIdUbicacionOfUsoretiroCollectionNewUsoretiro != null && !oldIdUbicacionOfUsoretiroCollectionNewUsoretiro.equals(ubicacion)) {
                        oldIdUbicacionOfUsoretiroCollectionNewUsoretiro.getUsoretiroCollection().remove(usoretiroCollectionNewUsoretiro);
                        oldIdUbicacionOfUsoretiroCollectionNewUsoretiro = em.merge(oldIdUbicacionOfUsoretiroCollectionNewUsoretiro);
                    }
                }
            }
            utx.commit();
            addSuccessMessage("Ubicacion was successfully updated.");
        } catch (Exception ex) {
            try {
                String msg = ex.getLocalizedMessage();
                if (msg != null && msg.length() > 0) {
                    addErrorMessage(msg);
                } else if (getUbicacionFromRequest() == null) {
                    addErrorMessage("The ubicacion with id " + currentUbicacionString + " no longer exists.");
                    utx.rollback();
                    return listSetup();
                } else {
                    addErrorMessage("A persistence error occurred.");
                }
                utx.rollback();
            } catch (Exception e) {
                ensureAddErrorMessage(e, "An error occurred attempting to roll back the transaction.");
            }
            return null;
        } finally {
            em.close();
        }
        return detailSetup();
    }
    
    /**
     * Funcion que permite la eliminacion de una entrada de Ubicacion
     * @return String
     */
    public String destroy() {
        ubicacion = getUbicacionFromRequest();
        if (ubicacion == null) {
            String currentUbicacionString = getRequestParameter("jsfcrud.currentUbicacion");
            addErrorMessage("The ubicacion with id " + currentUbicacionString + " no longer exists.");
            String relatedControllerOutcome = relatedControllerOutcome();
            if (relatedControllerOutcome != null) {
                return relatedControllerOutcome;
            }
            return listSetup();
        }
        EntityManager em = getEntityManager();
        try {
            utx.begin();
            ubicacion = em.getReference(ubicacion.getClass(), ubicacion.getIdUbicacion());
            Collection<Usoretiro> usoretiroCollection = ubicacion.getUsoretiroCollection();
            for (Usoretiro usoretiroCollectionUsoretiro : usoretiroCollection) {
                usoretiroCollectionUsoretiro.setIdUbicacion(null);
                usoretiroCollectionUsoretiro = em.merge(usoretiroCollectionUsoretiro);
            }
            em.remove(ubicacion);
            utx.commit();
            addSuccessMessage("Ubicacion was successfully deleted.");
        } catch (Exception ex) {
            try {
                ensureAddErrorMessage(ex, "A persistence error occurred.");
                utx.rollback();
            } catch (Exception e) {
                ensureAddErrorMessage(e, "An error occurred attempting to roll back the transaction.");
            }
            return null;
        } finally {
            em.close();
        }
        String relatedControllerOutcome = relatedControllerOutcome();
        if (relatedControllerOutcome != null) {
            return relatedControllerOutcome;
        }
        return listSetup();
    }
    
    /**
     * Función privada para obtener el Objeto Ubicacion del Request.
     * @return Ubicacion
     */
    private Ubicacion getUbicacionFromRequest() {
        String theId = getRequestParameter("jsfcrud.currentUbicacion");
        return (Ubicacion) new UbicacionConverter().getAsObject(FacesContext.getCurrentInstance(), null, theId);
    }
    
    /**
     * Función para obtener un valor del request.
     * @param key
     * @return String
     */
    private String getRequestParameter(String key) {
        return FacesContext.getCurrentInstance().getExternalContext().getRequestParameterMap().get(key);
    }
    
    /**
     * Getter de Ubicacion (atributo local).
     * @return List<Ubicacion>
     */
    public List<Ubicacion> getUbicacions() {
        if (ubicacions == null) {
            ubicacions = getUbicacions(false);
        }
        return ubicacions;
    }
    
    /**
     * Getter de todos los Tiporecruso's (de la Base de Datos)
     * @param all
     * @return List<Ubicacion>
     */
    public List<Ubicacion> getUbicacions(boolean all) {
        EntityManager em = getEntityManager();
        try {
            Query q = em.createQuery("select object(o) from Ubicacion as o");
            if (!all) {
                q.setMaxResults(batchSize);
                q.setFirstResult(getFirstItem());
            }
            return q.getResultList();
        } finally {
            em.close();
        }
    }
    
    /*
     *-------------------------------------------------------------------
     * Funciones de manejo de Mensajes y Errores.
     *-------------------------------------------------------------------
     */
    
    /**
     * Asegura que se almacenen los errores
     * @param ex
     * @param defaultMsg
     */
    private void ensureAddErrorMessage(Exception ex, String defaultMsg) {
        String msg = ex.getLocalizedMessage();
        if (msg != null && msg.length() > 0) {
            addErrorMessage(msg);
        } else {
            addErrorMessage(defaultMsg);
        }
    }
    
    /**
     * Agrega mensajes de Error para la Página. 
     * @param msg
     */
    public static void addErrorMessage(String msg) {
        FacesMessage facesMsg = new FacesMessage(FacesMessage.SEVERITY_ERROR, msg, msg);
        FacesContext.getCurrentInstance().addMessage(null, facesMsg);
    }
    
    /**
     * Agrega mensajes de Exito para la Página.
     * @param msg
     */
    public static void addSuccessMessage(String msg) {
        FacesMessage facesMsg = new FacesMessage(FacesMessage.SEVERITY_INFO, msg, msg);
        FacesContext.getCurrentInstance().addMessage("successInfo", facesMsg);
    }
    /**
     * Obtiene un Objeto Ubicacion con el id correspondiente.
     * @param id tipo idUbicacion
     * @return Objeto Ubicacion
     */ 
    public Ubicacion findUbicacion(Integer id) {
        EntityManager em = getEntityManager();
        try {
            Ubicacion o = (Ubicacion) em.find(Ubicacion.class, id);
            return o;
        } finally {
            em.close();
        }
    }
    
    /**
     * ------------------------------------------
     * Funciones de Iteración
     * ------------------------------------------
     */
    
    /**
     * Obtiene la cantidad de items de la Ubicacion
     * @return La cantidad de items
     */    
    public int getItemCount() {
        if (itemCount == -1) {
            EntityManager em = getEntityManager();
            try {
                itemCount = ((Long) em.createQuery("select count(o) from Ubicacion as o").getSingleResult()).intValue();
            } finally {
                em.close();
            }
        }
        return itemCount;
    }
    
    /**
     * Obtiene el primer item de la Ubicacion
     * @return El primer item
     */
    public int getFirstItem() {
        getItemCount();
        if (firstItem >= itemCount) {
            if (itemCount == 0) {
                firstItem = 0;
            } else {
                int zeroBasedItemCount = itemCount - 1;
                double pageDouble = zeroBasedItemCount / batchSize;
                int page = (int) Math.floor(pageDouble);
                firstItem = page * batchSize;
            }
        }
        return firstItem;
    }
    
    /**
     * Obtiene el ultimo item de la Ubicacion
     * @return El ultimo item
     */
    public int getLastItem() {
        getFirstItem();
        return firstItem + batchSize > itemCount ? itemCount : firstItem + batchSize;
    }
    
    /**
     * Obtiene tamaño del buffer para desplegar la lista
     * @return El tamaño del buffer
     */
    public int getBatchSize() {
        return batchSize;
    }
    
    /**
     * Obtiene la siguiente coleccion de items de Ubicacion
     * conforme al BatchSize
     * @return La siguiente coleccion de items
     */
    public String next() {
        reset(false);
        getFirstItem();
        if (firstItem + batchSize < itemCount) {
            firstItem += batchSize;
        }
        return "ubicacion_list";
    }
    
    /**
     * Obtiene la anterior coleccion de items de Ubicacion
     * conforme al BatchSize
     * @return La anterior coleccion de items
     */
    public String prev() {
        reset(false);
        getFirstItem();
        firstItem -= batchSize;
        if (firstItem < 0) {
            firstItem = 0;
        }
        return "ubicacion_list";
    }
    
    /**
     * Funcion para saber de que contexto esta viniendo la peticion
     * @return String
     */
    private String relatedControllerOutcome() {
        String relatedControllerString = getRequestParameter("jsfcrud.relatedController");
        String relatedControllerTypeString = getRequestParameter("jsfcrud.relatedControllerType");
        if (relatedControllerString != null && relatedControllerTypeString != null) {
            FacesContext context = FacesContext.getCurrentInstance();
            Object relatedController = context.getApplication().getELResolver().getValue(context.getELContext(), null, relatedControllerString);
            try {
                Class<?> relatedControllerType = Class.forName(relatedControllerTypeString);
                Method detailSetupMethod = relatedControllerType.getMethod("detailSetup");
                return (String) detailSetupMethod.invoke(relatedController);
            } catch (ClassNotFoundException e) {
                throw new FacesException(e);
            } catch (NoSuchMethodException e) {
                throw new FacesException(e);
            } catch (IllegalAccessException e) {
                throw new FacesException(e);
            } catch (InvocationTargetException e) {
                throw new FacesException(e);
            }
        }
        return null;
    }
    
    /**
     * Borra la referencia al objeto Representado (Borrado sin persistencia).
     * @param resetFirstItem
     */
    private void reset(boolean resetFirstItem) {
        ubicacion = null;
        ubicacions = null;
        itemCount = -1;
        if (resetFirstItem) {
            firstItem = 0;
        }
    }
    private Map<Object, String> asString = null;
    
    /**
     * Obtiene el mapeo del objeto actual en su representacion String
     * @return Mapeo de <code>Object, String</code>
     */
    public Map<Object, String> getAsString() {
        if (asString == null) {
            asString = new HashMap<Object, String>() {

                @Override
                public String get(Object key) {
                    if (key instanceof Object[]) {
                        Object[] keyAsArray = (Object[]) key;
                        if (keyAsArray.length == 0) {
                            return "(No Items)";
                        }
                        StringBuffer sb = new StringBuffer();
                        for (int i = 0; i < keyAsArray.length; i++) {
                            if (i > 0) {
                                sb.append("<br />");
                            }
                            sb.append(keyAsArray[i]);
                        }
                        return sb.toString();
                    }
                    return new UbicacionConverter().getAsString(FacesContext.getCurrentInstance(), null, (Ubicacion) key);
                }
            };
        }
        return asString;
    }
    
    /**
     * Función que Vincula y Valida JSP con el Objeto Ubicacion Representado.
     * @param facesContext el facesContext de Ubicacion
     * @param component el componet de Ubicacion
     * @param value el value de ubicacion
     */
    public void validateCreate(FacesContext facesContext, UIComponent component, Object value) {
        UbicacionConverter converter = new UbicacionConverter();
        String newUbicacionString = converter.getAsString(FacesContext.getCurrentInstance(), null, new Ubicacion());
        String ubicacionString = converter.getAsString(FacesContext.getCurrentInstance(), null, ubicacion);
        if (!newUbicacionString.equals(ubicacionString)) {
            createSetup();
        }
    }
    /**
     * Metodo para obtener el mayor IdUbicación de los disponibles
     * @return Integer
     */
    public int getItemMax() {
        EntityManager em = getEntityManager();
        String SQL;
        Integer s = 0;
        try {
            SQL = "select f_generar_idubicacion()";
            Query q = em.createNativeQuery(SQL);
            Vector v = new Vector();
            v = (Vector) q.getSingleResult();
            s = (Integer) v.get(0);
        } finally {
            em.close();
        }
        return s;
    }
}
